home *** CD-ROM | disk | FTP | other *** search
/ JCSM Shareware Collection 1996 September / JCSM Shareware Collection (JCS Distribution) (September 1996).ISO / butility / qwerty71.zip / MENU.BAT < prev    next >
DOS Batch File  |  1994-04-04  |  2KB  |  91 lines
  1. ECHO OFF
  2. CLS
  3. REM -- Test for access to all required files
  4. IF NOT EXIST MANUAL.TXT GOTO :FAULT
  5. IF NOT EXIST REGISTER.FRM GOTO :FAULT
  6. IF NOT EXIST QWERTY.COM GOTO :FAULT
  7. IF NOT EXIST Q-EDT.EXE GOTO :FAULT
  8. IF NOT EXIST Q-PNT.EXE GOTO :FAULT
  9. IF NOT EXIST DSKMSG.COM GOTO :FAULT
  10. IF NOT EXIST CLOCK.COM GOTO :FAULT
  11. IF NOT EXIST PX.COM GOTO :FAULT
  12. IF NOT EXIST LOADFONT.COM GOTO :FAULT
  13. IF NOT EXIST LETTER.DOC GOTO :FAULT
  14. IF NOT EXIST KEYS.DOC GOTO :FAULT
  15. IF NOT EXIST LJ-LTR.DOC GOTO :FAULT
  16. IF NOT EXIST LJ-CARD.DOC GOTO :FAULT
  17. IF NOT EXIST FILES.DOC GOTO :FAULT
  18. IF NOT EXIST ALTCHARS.DEF GOTO :FAULT
  19. IF NOT EXIST CHOOSE.COM GOTO :FAULT
  20. IF NOT EXIST INTRO.SDX GOTO :FAULT
  21. IF     EXIST REGST.SDX GOTO :MENU
  22. :FAULT
  23. CLS
  24. PROMPT $G
  25. ECHO ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  26. ECHO +                                                            +
  27. ECHO +  The files included in your  QWERTY  package are required  +
  28. ECHO +  to run MENU.BAT, but they were not found  in the current  +
  29. ECHO +  drive/directory and the batch cannot be run.              +
  30. ECHO +                                                            +
  31. ECHO +  Switch to the drive/directory with the QWERTY files, and  +
  32. ECHO +  try again.                                                +
  33. ECHO +                                                            +
  34. ECHO ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
  35. PROMPT $P$G
  36. GOTO :END
  37.  
  38. :MENU
  39. CLS
  40. CHOOSE MENU.TXT
  41. IF ERRORLEVEL=6 GOTO :M_INTRO
  42. IF ERRORLEVEL=5 GOTO :M_PRINT
  43. IF ERRORLEVEL=4 GOTO :M_REGISTER
  44. IF ERRORLEVEL=3 GOTO :M_QWERTY
  45. IF ERRORLEVEL=2 GOTO :M_LASER
  46. IF ERRORLEVEL=1 GOTO :END
  47. GOTO :END
  48.  
  49.  
  50. :M_INTRO -- "Introduction" SELECTION
  51. CLS
  52. TYPE INTRO.SDX
  53. PAUSE
  54. GOTO :MENU
  55.  
  56.  
  57. :M_PRINT -- "Print Manual" SELECTION
  58. CLS
  59. ECHO PRINTING MANUAL TEXT
  60. COPY MANUAL.TXT PRN
  61. GOTO :MENU
  62.  
  63.  
  64. :M_REGISTER -- "Registration" SELECTION
  65. CLS
  66. TYPE REGST.SDX
  67. PAUSE
  68. CLS
  69. CHOOSE PRINT REGISTRATION FORM?^{Y}es^{N}o
  70. IF ERRORLEVEL=2 GOTO :MM_REG_PNT
  71. GOTO :MENU
  72. :MM_REG_PNT
  73. CLS
  74. ECHO PRINTING REGISTRATION FORM
  75. COPY REGISTER.FRM PRN
  76. GOTO :MENU
  77.  
  78.  
  79. :M_QWERTY -- "QWERTY WORD PROCESSOR" SELECTION
  80. CLS
  81. QWERTY
  82. GOTO :MENU
  83.  
  84.  
  85. :M_LASER -- "QWERTY LaserJet Mode" SELECTION
  86. CLS
  87. QWERTY LASER-JET
  88. GOTO :MENU
  89.  
  90. :END
  91.